Top 10k strings from Mathematics - O-Level Revision and CSE (1984)(Longman Software)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   5                                 
   4  for next figure
   3 MATHEMATICS
   3 C$="IN CREDIT"
   3 A$="MATHEMATICS":
   3 ;"LONGMAN SOFTWARE 
   3 ;"                                "
   3 "DOUBLE WIDTH"
   3 "DOUBLE HEIGHT"
   3  YOUR ACCOUNT 
   3  END OF PROGRAM 
   3  DICE DISTRIBUTIONS 
   3  1984 MERCURIAN PULP
   3            PLEASE WAIT          "
   2 l,c;d$(n,1
   2 i$(n)="<"+
   2 Scale Factor
   2 C$=" IN DEBT "
   2 C$="         ":
   2 ;ya;"   ";
   2 ,C;"    ";
   2 ";i$(n);" 
   2  to start work 
   2  TOO BIG ! 
   2  PRODUCTS/CONTRACT BOOKS 
   2  Hard luck. You lose `";b;" 
   2  CARD COMBINATIONS 
   2   TOO FAR  
   2   TOO BIG  
   2     Press 
   2      SEARCHING AND LOADING      
   2                                  
   2           
   1 y=y+d(t,a)*120
   1 y=d(n,t)*s:
   1 w$=z$+"With 4 coins (or 4 spins of one coin), there is only 1 way to get all 4 HEADS.  "
   1 w$=z$+"With 36 possible combinations there is only 1 chance in 36 of scoring 12 or 2, "
   1 w$=z$+"What are the chances of getting 5 HEADS in a row ?"+z$:
   1 w$=z$+"Two dice will give scores from 2 to 12 but some scores are more likely than others. "+z$
   1 w$=z$+"Notice also the cummulative totals >>>> If the dice are rolled to give 9 , "
   1 w$=z$+"It's hard enough to predict one card correctly, but if you try to predict 2 or more cards in succession the odds pile up against you."+z$
   1 w$=z$+" Bear these facts in mind when playing Dice with Honest Jo."+z$
   1 w$=w$+z$+"Notice also how the chances of all HEADS or all TAILS gets rapidly smaller.  "
   1 w$=w$+"then the odds are 26 to 6 that the next score will be lower."
   1 w$=w$+" but 6 in 36 (1 in 6) chances of a 7."+z$ 
   1 tot=tot+d(u,n):
   1 tot=tot+(n
   1 to play Again  
   1 to guess Again 
   1 t;x1-x,y1-y
   1 s$(q)=s$(q,4
   1 r(t,o)=r(t,o+1
   1 r(t,j)<b(n+1
   1 now  then 
   1 mygo=mygo*-1
   1 lo=lo+p(t):
   1 hi=hi+p(t):
   1 d(t,n)=d(t,n)+1
   1 c$="         ":
   1 b(t)=b(t)*
   1 a(u,n)=d(u,n)*360
   1 a(t)=b(t):
   1 a(t),b(t):
   1 What do you want to predict?
   1 W$=Z$+"Notice how the pattern forms.    The edge numbers are always 1's.   Each inside number is the sum of the two above it."
   1 W$=Z$+"A single (honest) dice is just as likely to give any number between 1 and 6. "+z$:
   1 V(T)=V(t)+r(t,n):
   1 Translation 
   1 Translation
   1 Transform A%
   1 Table complete. 
   1 Table complete 
   1 TRANSFORM 
   1 Stats     
   1 Spin sub-routine
   1 Spades,Hearts,Diamonds or Clubs?    
   1 Shall I work out the boundaries?       Press 
   1 STOP THE TAPE - PRESS ANY KEY  "
   1 STATS     
   1 STATISTICSc
   1 SPIN 3 AT A TIME 
   1 SPIN 2 AT A TIME 
   1 SEE LINES 1890,2125 AND 6220.                     
   1 S=E+A(u,N+1
   1 R(T,N)=D(T,N):
   1 P=E+(A(u,N+1
   1 Odds      af
   1 ODDS      
   1 LO=R(T,RN*3
   1 If VERIFY fails then GOTO 450  
   1 I'll pay `";mb;" if you're right"
   1 HI=R(T,RN/4
   1 E=S+A(u,N)*
   1 Do you want to bet? 
   1 Do you want this as a Pie Chart?        Press 
   1 Do you want this as a Bar Chart?        Press 
   1 Do you want a numerical analysis of this data? Press 
   1 Do you want a demonstration?  
   1 DISCRETE OR CONTINUOUS VARIABLES      PRESS 
   1 D(T,N)=R(T,N):
   1 Created with Ramsoft MakeTZX
   1 C$="IN DEBT  "
   1 B(T)=Y(T):
   1 B(T)=B(T)+M2:
   1 B(T)=B(T)*S2:
   1 B(T)=B(T)*R2:
   1 A(T)=A(T)+M1
   1 A(T)=A(T)*S1
   1 A(T)=A(T)*R1
   1 A$="STATISTICS":
   1 A$="HONEST JO'S TAKE-A-SPIN":
   1 A$="HONEST JO'S ROLLING-BONES":
   1 A$="HONEST JO'S CUT-A-CARD":
   1 A$=" TRANSFORM ":
   1 A$=" ODDS ":
   1 <10  <20  <30  <40  <50  
   1 ;Z$;Z$;Z$;Z$;Z$;Z$
   1 ;YA;"    ";
   1 ;;od;" to ";hd;
   1 ;"want to know the odds first?"
   1 ;"there is an even chance of";
   1 ;"that it will land Heads";
   1 ;"spin,the smaller the chance";
   1 ;"select your transformation ";
   1 ;"range of transformations."
   1 ;"its vertices (Max. 50), then"
   1 ;"it landing Heads."
   1 ;"every time." 
   1 ;"colour and then 
   1 ;"be achieved stage by stage."
   1 ;"are 1/2 * 1/4 =1 in 8.
   1 ;"and sit back."
   1 ;"The odds for predicting";
   1 ;"Specific VAlUE";
   1 ;"Specific SUIT";
   1 ;"Specific CARD";
   1 ;"RED or BLACK";
   1 ;"I bet `";mb;" you can't beat ";ms;"."
   1 ;"I bet `";mb;" I can beat ";ys;"."
   1 ;"However,the more often you";
   1 ;"Each time you spin a coin";
   1 ;"Do you feel lucky or do you";
   1 ;"Design a figure by plotting";
   1 ;"Cum.Freq."
   1 ;"Compound transformations can";
   1 ;">>> ";od;" to ";hd;" <<<";
   1 ;"1 in 52"
   1 ;"1 in 2";
   1 ;"1 in 13";
   1 ;" Figures please for ";t$(n);" "
   1 ;"   Let's start again.  
   1 ;"      LAST 8 SPINS        "'Z$(
   1 ;"      ":
   1 ;"       ":
   1 ;"       "
   1 ;"              ":
   1 /i);i$(n,t):
   1 /CONTRACT BOOKS
   1 -n;" ";t$(n):
   1 ,pc;p$(p,2
   1 ,PC;P$(P,2
   1 ,C;" ";M$(SN,2
   1 ,C;" ";M$(SN,1
   1 ,C;"    ":
   1 )=(max/i)*n:
   1 );N$(CN);"  ";
   1 )-v(t)/rn)^2
   1 )-a(n),b(1
   1 )-X(n),Y(1
   1 )-X(T),Y(T-1
   1 )-V(T)/rn)^2
   1 )-A(T),B(T-1
   1 )+p$(n,q):
   1 )+"  There are 4 ways to get 3 HEADS and 1 TAIL ":
   1 )+"   and only 1 way to get 4 TAILS.  ":
   1 )+"   6 ways to get 2 HEADS + 2 TAILS  ":
   1 )+"   4 ways to get 1 HEAD and 3 TAILS ":
   1 (sd/rn))*100
   1 (b(T)+M2)>88
   1 (b(T)*S2)>88
   1 (A(T)+M1)>128
   1 (A(T)*S1)>128
   1 ((V(T)/rn)*10
   1 ((B*(lo+lx)/(hi+hx))*100
   1 ((B*(hi+hx)/(lo+lx))*100
   1 "Transform"
   1 "TRANSFORM"
   1 "SPADES","CLUBS","HEARTS","DIAMONDS","RED","BLACK"
   1 "HEADS","TAILS"
   1 "2","3","4","5","6","7","8","9","10","J","Q","K","A"
   1 "                         
   1  transform original figure  "
   1  transform new figure        
   1  to transform the figure     
   1  to transform 
   1  to go on  "
   1  to go on    
   1  to go on   
   1  to go on 
   1  to end   
   1  the odds of 5H. 1 in ";
   1  readings (in any order)  
   1  produces a wide";
   1  predicted value:
   1  old data ?           Press 
   1  number of tables? ";
   1  number of divisions:   (Max.";m;")");
   1  number of divisions       (MAX.=";M;")   ");
   1  no. of points wanted: ";
   1  name of division ";N;"       (MAX.5 LETTERS) 
   1  in X=0 ";
   1  how much. `
   1  for no     
   1  for next table ":
   1  for next table 
   1  for next chart 
   1  for new shape 
   1  for data analysis":
   1  data: ");
   1  are 1 in 2.
   1  Your Choice ?
   1  YOU GO FIRST THIS TIME 
   1  Y coordinate Point ";t;" 
   1  X coordinate Point ";t;" 
   1  What's up? Not feeling lucky?  
   1  What do you bet it's HEADS ?    
   1  Well rolled. You win `";mb;" 
   1  Upper boundary for        division ";n;": ");
   1  Translation 
   1  This Bet `";b;" 
   1  The odds are 1 in 32."
   1  The odds are 1 in ";od;" 
   1  TRANSLATE 
   1  TRANSLATE
   1  TRANSFORM l
   1  TRANSFORM 
   1  TOO MANY !! 
   1  TITLE for charts. (Max.20 letters): ";
   1  TAKE A SPIN        
   1  SPINNING COINS   
   1  SPINNING A COIN 
   1  SPIN 4 AT A TIME 
   1  SPIN 1 AT A TIME 
   1  Rotation 
   1  Return           Press 
   1  Reflection 
   1  Reflect in which axis?
   1  Red or Black? 
   1  Range of readings ? 
   1  ROLLING DICE     
   1  ROLLING DICE 
   1  ROLL THEM BONES   
   1  RE-ORDERING DATA - PLEASE WAIT 
   1  RE-ORDERING - DATA PLEASE WAIT 
   1  Please press 
   1  PROGRAM READY - PRESS ANY KEY  ":
   1  PROGRAM READY - PRESS ANY KEY  
   1  PROGRAM OPTIONS 
   1  PREDICTION ";:
   1  PASCAL'S TRIANGLE  ";
   1  PASCAL'S TRIANGLE 
   1  ODDS: LOWER ";LO;"  HIGHER ";HI;" 
   1  ODDS ON HEADS NEXT SPIN  
   1  Number of readings per table?  If unknown, estimate max. 
   1  Name for SAVING ?";
   1  NUMERICAL ANALYSIS OF DATA 
   1  Minimum: ";
   1  Maximum: 
   1  Last table.
   1  Item: ";i$(t);". 
   1  Insert tape and press 
   1  IN DEBT A
   1  How much do you bet? `
   1  Heading for table ";n;"       (Max. 5 letters)");
   1  Hard luck. You lose `";b;".
   1  Good guess. you win `";b;" 
   1  Good guess. You win `";mb;" 
   1  Figures please for table ";t;".    
   1  Figure ";n;" or 
   1  FIRST CUT PROBABILITIES "
   1  Enlargement 
   1  END OF PROGRAM   
   1  Draw. All bets cancelled. 
   1  Do you want to SAVE this data ?          Press 
   1  Do you want to 
   1  DISPLAY OPTIONS 
   1  DICE DISTRIBUTION 
   1  DATA loaded. Press 
   1  DATA COLLECTION 
   1  CUTTING CARDS    
   1  CUTTING CARDS 
   1  CUT-A-CARD        
   1  CUT-A-CARD 
   1  Aren't you doing well!!";
   1  Another Option ?        
   1  Aah! Not feeling lucky, eh? 
   1  2,3,4,5,6,7,8,9,10,J,Q,K or A   
   1  ";r(t,rn/2
   1  ";i$(n);"
   1  ";V(T);" 
   1  ";N$(PV);" "
   1  ";HI-LO;" 
   1  !VERIFY! Rewind tape  
   1   of 135 degrees ";
   1   Y=Y-80 ";
   1   Y=Y*2 : X=X*.5 ";
   1   Would you like to play Dice ?          Press 
   1   VALUE    
   1   Translate 
   1   The original figure ";
   1   Rotate     "
   1   Reflect   
   1   I GO FIRST THIS TIME  
   1   HELLO THERE!             ARE YOU TRYING TO FIND HOW      HONEST JO FIXES THE ODDS?   
   1   Find tape and rewind to start   of data then press 
   1   Feeling full of foresight?   
   1   Enlarge     
   1   Do you want to TAKE A SPIN ?           Press 
   1   COLOUR   
   1    Sorting data - please wait.  
   1    SUIT    
   1    Do you want another option?          Press 
   1    CARD    
   1     Number beyond set limits!!  
   1       SEARCHING AND LOADING     
   1       Press 
   1        ONE MOMENT PLEASE        
   1        "'Z$;Z$
   1         Press 
   1                                 ":
   1                                  Bear these facts in mind when playing Dice with Honest Jo.                                
   1                          
   1                        
   1                      
   1                    
   1               
   1